home *** CD-ROM | disk | FTP | other *** search
/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech's Sprocket™ / SprocketGX / ExperimentalStuff / MailableDocWindow.cp next >
Encoding:
Text File  |  1994-10-17  |  1.0 KB  |  44 lines  |  [TEXT/MMCC]
  1. /*
  2.     File:        MailableDocWindow.cp
  3.  
  4.     Contains:    A wacky multiple inheritance experiment with AOCE
  5.                 
  6.     Written by: Steve & Dave Falkenburg
  7.     
  8.     Copyright:    © 1993-94 by Dave Falkenburg, all rights reserved.
  9.  
  10.     Change History (most recent first):
  11.     
  12.          <2>     8/26/94    DRF        Added GetPerfectWindowSize, with call to
  13.                                     AdjustPerfectWindowSizeForMailer.
  14.  
  15.     To Do:        Just about everything
  16.     
  17.  */
  18.  
  19. #include "MailableDocWindow.h"
  20. #include "AppLib.h"
  21.  
  22. TMailableDocWindow::TMailableDocWindow()
  23. {
  24.     this->CreateWindow();        //    must be a normal window
  25. }
  26.  
  27. WindowPtr TMailableDocWindow::MakeNewWindow(WindowPtr behindWindow)
  28. {
  29.     WindowPtr    aWindow = GetNewColorOrBlackAndWhiteWindow(1027,nil,behindWindow);
  30.     return aWindow;
  31. }
  32.  
  33. void TMailableDocWindow::GetPerfectWindowSize(Rect * perfectSize)
  34. {
  35.     TWindow::GetPerfectWindowSize(perfectSize);
  36.     AdjustPerfectWindowSizeForMailer(perfectSize);
  37. }
  38.  
  39. void TMailableDocWindow::DrawContents(void)
  40. {
  41.     //    drawing will be clipped to the content so we can go ahead and use the portRect
  42.     FillRect(&fWindow->portRect,&qd.ltGray);
  43. }
  44.